home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 90 / CD Actual 90.iso / Software3D / K-3D / k3d-0.4.2.1 / share / lsystem / higgs-copepoda-crustacean-mutated.ls < prev    next >
Encoding:
Text File  |  2004-07-23  |  1.2 KB  |  38 lines
  1. # --- L-System Parser/Mutator --- Martin Higgs-------------------------
  2. # --- This file produces a crustacean of the subclass Copepoda.
  3. # --- Mutated relative.
  4. 15
  5. 20 # try 60
  6. 80
  7. A
  8. A=[H][[I]T][B]
  9. T=c(1)+(90)^(5)[F--[v]++[m]++[m]++[o]]|^(10)>(180)[F--[q]++[p]++[p]++[r]]
  10. m=!!!F'^(5)F--c(3){f++f++f--|--f++f++f}
  11. n=!!!F'^(5)F'^(5)F--''c(3){f++f++f--|--f++f++f}j
  12. o=!![W]!F-c(3){f+f+f-|-f+f+f}
  13. p=!!!F'&(5)F--c(3){f++f++f--|--f++f++f}
  14. q=!!!F"&(5)F'&(5)F--''c(3){z++f++f--|--f++f++f}
  15. r=!!!Z-c(3){f+f+f-|-f+f+f}
  16. #
  17. B=ccc'''''''!?bFbFbFFbFbF[[D][e]]F'F'''F[[D][E]]F'F''F[[D][E]]FF'[X][Y]
  18. b=^(1)?(1.3)x
  19. #
  20. D=^^!!?!c(6)-(85)FF'F[---'(.275)T]dddddd!!!c(4)F+'F+'F+(10)'F'F'+F
  21. E=^^!!!!c(6)+(85)FF'Z[+++'(.275)Q]eeeeee!!!c(4)F-'F-'F+-10)'F'F'-F
  22. d=+(10)'F[++++!!c(4)'''F''F''F''F]
  23. e=-(10)'F[+---!!c(4)'''F''F''F''F]
  24. #
  25. X=^-(90)fc(2)!(.2)"+++F[q]FF[-H]xxx[W]xxx[[s]"W]xxx[+'(.5)W]xxxllllllll"s
  26. x=-(10)F!(.96)
  27. l=+(10)F!(.96)
  28. Y=^+(90)zc(2)!(.2)"---F[I]FF[+I]lll[Q]lll['Q]lll[-'(.5)Q]lllxxxxxxxx"v
  29. H=c(7)"""++!!!!FFF--c(3){f+f+f-|-f+f+f}
  30. I=c(7)"""--!!!!FFFc(3){f+f+f-|-f+f+f}
  31. s=c(7)!!!FF+FF+F'^(5)F--c(3)""{f++f++f--|--f++f++f}o
  32. v=c(7)!?!FF-FF-F'^(5)F--c(3)""{f++f++f--|--f++f++f}
  33. W=+[E]c(7)!!aaaaaaaaaaaaar
  34. a=FF[Y]'-(5)
  35. Q=-c(7)!!jjjjjjjjjjjjjv
  36. j=FF'+(5)
  37. @
  38.